﻿Imports HensonOnline

Partial Class family_Default
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Dim family As New Family(1)
        Dim properties As ArrayList = family.GetFamily(1)

        'familyName.InnerText = family.FamilyName
        'mother.InnerText = family.Mother
        'father.InnerText = family.Father

        gvFamily.DataSource = family.GetFamilies()
        gvFamily.DataBind()
    End Sub
End Class
